Public Class Domicilios
    Dim ADDom As New ADCono.Domicilios

    Public Function GenerarDomicilios(ByVal DirDom, ByVal CodPai, ByVal CodPro, ByVal CodCuiLoc, ByVal CodRS, ByVal ObsDom)
        Dim DS As New DataSet
        DS = ADDom.GenerarDomicilios(DirDom, CodPai, CodPro, CodCuiLoc, CodRS, ObsDom)
        Return DS
    End Function


End Class
